home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1995 October
/
EnigmA AMIGA RUN 01 (1995)(G.R. Edizioni)(IT)[!][issue 1995-10][Aminet 7].iso
/
Aminet
/
gfx
/
fract
/
fu1_61.lha
/
Formulas
/
Double-Sword.Form
< prev
next >
Wrap
Text File
|
1994-05-12
|
233b
|
32 lines
Double-Sword
{
{
mirrorx
x1=-2.0
x2= 2.0
y1=-2.0
y2= 2.0
}
{
c=pixel
v=abs(c)
z=pixel
}
{
a1=z*z
a2=c-[1.0,0.0]
a=a1+a2
b1=z+z
b2=c-[2.0,0.0]
b=b1+b2
z=a/b
z=z*z
w=abs(z)
}
{
w<v
}
{
}
}